Chip 1998 September/CHIP Eylül 1998.iso/demolar/lokman/DISK1/_SETUP.4/Group1/Demo8E.exe/0/RCDATA/TQTANIMRECFORM/TQTANIMRECFORM.txt

Text File | 1998-07-30 | 55KB | 2,319 lines

object QTanimRecForm: TQTanimRecForm
  Left = 96
  Top = 157
  Width = 505
  Height = 210
  HorzScrollBar.Range = 1200
  VertScrollBar.Range = 2000
  ActiveControl = BitBtn5
  AutoScroll = False
  Caption = 'Re�ete Arkas� D�k�mleri'
  Font.Color = clBlack
  Font.Height = -9
  Font.Name = 'Arial'
  Font.Style = []
  Menu = MainMenu1
  Scaled = False
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Title: TQRBand
    Left = 0
    Top = 0
    Width = 1200
    Height = 12
    Align = alTop
    BandType = rbTitle
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    Ruler = qrrNone
    object QRLabelBaslik: TQRLabel
      Left = 8
      Top = 0
      Width = 97
      Height = 10
      Caption = 'Re�ete Arkas� D�k�m�'
      AlignToBand = False
    end
  end
  object PageHeader: TQRBand
    Left = 0
    Top = 12
    Width = 1200
    Height = 46
    Align = alTop
    BandType = rbGroupHeader
    BeforePrint = PageHeaderBeforePrint
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    LinkBand = Detail
    Ruler = qrrCmHV
    object IlacBas1: TQRDBText
      Left = 3
      Top = 27
      Width = 65
      Height = 17
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'B_CAPTION1'
    end
    object IlacBas2: TQRDBText
      Left = 89
      Top = 27
      Width = 65
      Height = 17
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'B_CAPTION2'
    end
    object IlacBas3: TQRDBText
      Left = 175
      Top = 27
      Width = 65
      Height = 17
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'B_CAPTION3'
    end
    object IlacBas4: TQRDBText
      Left = 255
      Top = 27
      Width = 65
      Height = 17
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'B_CAPTION4'
    end
    object IlacBas5: TQRDBText
      Left = 345
      Top = 27
      Width = 65
      Height = 17
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'B_CAPTION5'
    end
    object IlacBas6: TQRDBText
      Left = 429
      Top = 27
      Width = 65
      Height = 17
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'B_CAPTION6'
    end
    object IlacBas7: TQRDBText
      Left = 502
      Top = 27
      Width = 65
      Height = 17
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'B_CAPTION7'
    end
    object QRDBText12: TQRDBText
      Left = 4
      Top = 0
      Width = 215
      Height = 17
      AlignToBand = False
      DataSource = DS_KRMLAR
      DataField = 'AD'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object QRDBText13: TQRDBText
      Left = 227
      Top = 0
      Width = 222
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
      DataField = 'HASTANO'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object IlacBas8: TQRDBText
      Left = 568
      Top = 27
      Width = 65
      Height = 17
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'B_CAPTION7'
    end
  end
  object Master: TQRBand
    Left = 0
    Top = 73
    Width = 1200
    Height = 338
    Align = alTop
    BandType = rbDetail
    BeforePrint = MasterBeforePrint
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    LinkBand = QRBandUZ
    Ruler = qrrCmHV
    object QRShDat9: TQRShape
      Left = 110
      Top = 244
      width = 139
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShBas9: TQRShape
      Left = 1
      Top = 244
      width = 110
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShDat8: TQRShape
      Left = 110
      Top = 227
      width = 139
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShBas8: TQRShape
      Left = 1
      Top = 227
      width = 110
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShBas7: TQRShape
      Left = 1
      Top = 210
      width = 110
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShDat7: TQRShape
      Left = 110
      Top = 210
      width = 139
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShDat6: TQRShape
      Left = 110
      Top = 193
      width = 139
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShBas6: TQRShape
      Left = 1
      Top = 193
      width = 110
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShDat5: TQRShape
      Left = 110
      Top = 176
      width = 139
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShBas5: TQRShape
      Left = 1
      Top = 176
      width = 110
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShDat4: TQRShape
      Left = 110
      Top = 159
      width = 139
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShBas4: TQRShape
      Left = 1
      Top = 159
      width = 110
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShDat3: TQRShape
      Left = 110
      Top = 142
      width = 139
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShBas3: TQRShape
      Left = 1
      Top = 142
      width = 110
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShDat2: TQRShape
      Left = 110
      Top = 125
      width = 139
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShBas2: TQRShape
      Left = 1
      Top = 125
      width = 110
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShECZ: TQRShape
      Left = 1
      Top = 48
      width = 248
      Height = 61
      Shape = qrsRectangle
    end
    object QRShDat1: TQRShape
      Left = 110
      Top = 108
      width = 139
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object QRShBas1: TQRShape
      Left = 1
      Top = 108
      width = 110
      Height = 18
      Visible = False
      Shape = qrsRectangle
    end
    object RecBaslik2: TQRDBText
      Left = 3
      Top = 127
      Width = 105
      Height = 14
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'CAPTION2'
    end
    object RecBaslik1: TQRDBText
      Left = 3
      Top = 111
      Width = 105
      Height = 14
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'CAPTION1'
    end
    object RecData2: TQRDBText
      Left = 112
      Top = 127
      Width = 135
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
    end
    object RecData1: TQRDBText
      Left = 112
      Top = 111
      Width = 135
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
    end
    object RecData5: TQRDBText
      Left = 112
      Top = 178
      Width = 135
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
    end
    object RecData4: TQRDBText
      Left = 112
      Top = 161
      Width = 135
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
    end
    object RecData3: TQRDBText
      Left = 112
      Top = 144
      Width = 135
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
    end
    object RecBaslik3: TQRDBText
      Left = 3
      Top = 144
      Width = 105
      Height = 14
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'CAPTION3'
    end
    object RecBaslik4: TQRDBText
      Left = 3
      Top = 161
      Width = 105
      Height = 14
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'CAPTION4'
    end
    object RecBaslik5: TQRDBText
      Left = 3
      Top = 178
      Width = 105
      Height = 14
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'CAPTION5'
    end
    object RecData6: TQRDBText
      Left = 111
      Top = 195
      Width = 135
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
    end
    object RecData7: TQRDBText
      Left = 112
      Top = 212
      Width = 135
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
    end
    object RecData8: TQRDBText
      Left = 112
      Top = 229
      Width = 135
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
    end
    object QRDBText25: TQRDBText
      Left = 171
      Top = 294
      Width = 86
      Height = 12
      AlignToBand = False
      AutoSize = True
      DataSource = DS_RECKOPYA
      DataField = 'HASTANO'
    end
    object RecData9: TQRDBText
      Left = 112
      Top = 246
      Width = 135
      Height = 14
      AlignToBand = False
      DataSource = DS_RECKOPYA
    end
    object RecBaslik6: TQRDBText
      Left = 3
      Top = 195
      Width = 105
      Height = 14
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'CAPTION6'
    end
    object RecBaslik7: TQRDBText
      Left = 3
      Top = 212
      Width = 105
      Height = 14
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'CAPTION7'
    end
    object RecBaslik8: TQRDBText
      Left = 3
      Top = 229
      Width = 105
      Height = 14
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'CAPTION8'
    end
    object RecBaslik9: TQRDBText
      Left = 3
      Top = 246
      Width = 105
      Height = 14
      AlignToBand = False
      DataSource = DS_RecKolon
      DataField = 'CAPTION9'
    end
    object QRLabel1: TQRLabel
      Left = 290
      Top = 1
      Width = 63
      Height = 12
      Caption = 'Genel Toplam :'
      AlignToBand = False
    end
    object QRLabel2: TQRLabel
      Left = 146
      Top = 34
      Width = 52
      Height = 12
      Caption = 'H.Kat.Pay� ('
      AlignToBand = False
    end
    object Nyuzde: TQRDBText
      Left = 200
      Top = 34
      Width = 32
      Height = 12
      Alignment = taCenter
      AlignToBand = False
      AutoSize = True
      DataSource = DS_RECKOPYA
      DataField = 'yuzdeN'
    end
    object Iyuzde: TQRDBText
      Left = 235
      Top = 34
      Width = 28
      Height = 12
      Alignment = taCenter
      AlignToBand = False
      AutoSize = True
      DataSource = DS_RECKOPYA
      DataField = 'yuzdeI'
    end
    object Oyuzde: TQRDBText
      Left = 272
      Top = 34
      Width = 32
      Height = 12
      Alignment = taCenter
      AlignToBand = False
      AutoSize = True
      DataSource = DS_RECKOPYA
      DataField = 'yuzdeO'
    end
    object QRLabel3: TQRLabel
      Left = 225
      Top = 34
      Width = 5
      Height = 12
      Caption = '+'
      AlignToBand = False
    end
    object QRLabel4: TQRLabel
      Left = 265
      Top = 34
      Width = 5
      Height = 12
      Caption = '+'
      AlignToBand = False
    end
    object QRLabel5: TQRLabel
      Left = 344
      Top = 34
      Width = 9
      Height = 12
      Caption = ') :'
      AlignToBand = False
    end
    object QRLabel6: TQRLabel
      Left = 164
      Top = 16
      Width = 34
      Height = 12
      Caption = '�ndirim ('
      AlignToBand = False
    end
    object QRDBText1: TQRDBText
      Left = 200
      Top = 16
      Width = 3
      Height = 12
      Alignment = taCenter
      AlignToBand = False
      AutoSize = True
      DataSource = DS_KRMLAR
      DataField = 'ILACLARDAKURUM'
    end
    object QRDBText2: TQRDBText
      Left = 235
      Top = 16
      Width = 3
      Height = 12
      Alignment = taCenter
      AlignToBand = False
      AutoSize = True
      DataSource = DS_KRMLAR
      DataField = 'ILACBERABERKURUM'
    end
    object QRDBText3: TQRDBText
      Left = 272
      Top = 16
      Width = 17
      Height = 12
      Alignment = taCenter
      AlignToBand = False
      AutoSize = True
      DataSource = DS_KRMLAR
      DataField = 'OZELKATILIMKURUM'
    end
    object QRLabel7: TQRLabel
      Left = 225
      Top = 16
      Width = 5
      Height = 12
      Caption = '+'
      AlignToBand = False
    end
    object QRLabel8: TQRLabel
      Left = 265
      Top = 16
      Width = 5
      Height = 12
      Caption = '+'
      AlignToBand = False
    end
    object QRLabel9: TQRLabel
      Left = 344
      Top = 16
      Width = 9
      Height = 12
      Caption = ') :'
      AlignToBand = False
    end
    object QRDBText4: TQRDBText
      Left = 354
      Top = 33
      Width = 92
      Height = 17
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DS_RECKOPYA
      DataField = 'HKPson'
    end
    object QRDBText5: TQRDBText
      Left = 354
      Top = 16
      Width = 92
      Height = 17
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DS_RECKOPYA
      DataField = 'INDIRSon'
    end
    object QRDBText6: TQRDBText
      Left = 354
      Top = -1
      Width = 92
      Height = 16
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DS_RECKOPYA
      DataField = 'BRUT'
    end
    object QRLabel10: TQRLabel
      Left = 256
      Top = 51
      Width = 97
      Height = 12
      Caption = 'Net Toplam(K.Pays�z) :'
      AlignToBand = False
    end
    object QRDBText7: TQRDBText
      Left = 354
      Top = 50
      Width = 92
      Height = 17
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DS_RECKOPYA
      DataField = 'NETSON'
    end
    object QRLabel11: TQRLabel
      Left = 1
      Top = 295
      Width = 136
      Height = 12
      Caption = '�LA�LARI ALANIN ADI SOYADI'
      AlignToBand = False
    end
    object NelerAldim: TQRLabel
      Left = 1
      Top = 279
      Width = 45
      Height = 12
      Caption = 'NelerAldim'
      AlignToBand = False
    end
    object Katkim: TQRLabel
      Left = 1
      Top = 266
      Width = 29
      Height = 12
      Caption = 'Katkim'
      AlignToBand = False
    end
    object QRLabel13: TQRLabel
      Left = 1
      Top = 309
      Width = 22
      Height = 12
      Caption = '�MZA'
      AlignToBand = False
    end
    object QRDBCalc1: TQRDBCalc
      Left = 332
      Top = 322
      Width = 31
      Height = 11
      Alignment = taRightJustify
      AlignToBand = False
      DataSource = DS_RECKOPYA
      DataField = 'SATISNO'
      Operation = qrcCOUNT
    end
    object QRLabel14: TQRLabel
      Left = 306
      Top = 34
      Width = 5
      Height = 12
      Caption = '+'
      AlignToBand = False
    end
    object QRDBText10: TQRDBText
      Left = 311
      Top = 34
      Width = 32
      Height = 12
      Alignment = taCenter
      AlignToBand = False
      AutoSize = True
      DataSource = DS_RECKOPYA
      DataField = 'yuzdeH'
    end
    object QRDBText11: TQRDBText
      Left = 311
      Top = 16
      Width = 27
      Height = 12
      Alignment = taCenter
      AlignToBand = False
      AutoSize = True
      DataSource = DS_KRMLAR
      DataField = 'ITHALKURUM'
    end
    object QRLabel15: TQRLabel
      Left = 306
      Top = 16
      Width = 5
      Height = 12
      Caption = '+'
      AlignToBand = False
    end
    object QRLabel12: TQRLabel
      Left = 3
      Top = 65
      Width = 89
      Height = 14
      Caption = 'Ecz.Lokman Hekim'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object QRLabel18: TQRLabel
      Left = 4
      Top = 80
      Width = 233
      Height = 14
      Caption = 'PERPA Kat:11 No:1680 OKMEYDANI / �STANBUL'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object QRLabel17: TQRLabel
      Left = 133
      Top = 94
      Width = 99
      Height = 14
      Caption = 'TLF: 0212 222 43 39'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object QRLabel16: TQRLabel
      Left = 59
      Top = 51
      Width = 125
      Height = 14
      Caption = 'MEKATRON�K ECZANES�'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object Detail: TQRBand
    Left = 0
    Top = 58
    Width = 1200
    Height = 15
    Align = alTop
    BandType = rbSubDetail
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    LinkBand = Master
    Ruler = qrrNone
    object IlacData1: TQRDBText
      Left = 3
      Top = 0
      Width = 44
      Height = 14
      AlignToBand = False
      DataSource = DS_SATIS
      OnPrint = IlacData1Print
    end
    object IlacData4: TQRDBText
      Left = 255
      Top = 0
      Width = 44
      Height = 14
      AlignToBand = False
      DataSource = DS_SATIS
    end
    object IlacData5: TQRDBText
      Left = 345
      Top = 0
      Width = 44
      Height = 14
      AlignToBand = False
      DataSource = DS_SATIS
    end
    object IlacData6: TQRDBText
      Left = 429
      Top = 0
      Width = 44
      Height = 14
      AlignToBand = False
      DataSource = DS_SATIS
    end
    object IlacData2: TQRDBText
      Left = 89
      Top = 0
      Width = 44
      Height = 14
      AlignToBand = False
      DataSource = DS_SATIS
    end
    object IlacData3: TQRDBText
      Left = 175
      Top = 0
      Width = 44
      Height = 14
      AlignToBand = False
      DataSource = DS_SATIS
    end
    object IlacData7: TQRDBText
      Left = 505
      Top = 0
      Width = 44
      Height = 14
      AlignToBand = False
      DataSource = DS_SATIS
    end
    object IlacData8: TQRDBText
      Left = 569
      Top = 0
      Width = 44
      Height = 14
      AlignToBand = False
      DataSource = DS_SATIS
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 11
    Width = 481
    Height = 139
    BevelInner = bvLowered
    BorderWidth = 2
    BorderStyle = bsSingle
    Color = clPurple
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 4
    object Label2: TLabel
      Left = 6
      Top = 8
      Width = 33
      Height = 14
      Caption = '&Ba�l�k'
      FocusControl = Edit1
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object LabelRUZ: TLabel
      Left = 43
      Top = 35
      Width = 189
      Height = 14
      Alignment = taCenter
      AutoSize = False
      Caption = 'Re�.ler &Aras� Boydan Uzakl�k (mm)'
      Color = clPurple
      FocusControl = SpinEditUZ
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 43
      Top = 6
      Width = 426
      Height = 22
      TabOrder = 5
    end
    object BitBtn1: TBitBtn
      Left = 149
      Top = 64
      Width = 127
      Height = 27
      Caption = 'Ba�l�k &De�i�tir'
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 9
      Top = 100
      Width = 127
      Height = 27
      Caption = '&Re�. �ng�r�n�m'
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = ListeEkranGrnts1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33033333333333333F7F3333333333333000333333333333F777333333333333
        000333333333333F777333333333333000333333333333F77733333333333300
        033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
        333333773337777333333078F8F87033333337F3333337F33333778F8F8F8773
        333337333333373F333307F8F8F8F70333337F33FFFFF37F3333078999998703
        33337F377777337F333307F8F8F8F703333373F3333333733333778F8F8F8773
        333337F3333337F333333078F8F870333333373FF333F7333333330777770333
        333333773FF77333333333370007333333333333777333333333}
      NumGlyphs = 2
    end
    object BitBtn3: TBitBtn
      Left = 149
      Top = 100
      Width = 127
      Height = 27
      Caption = 'Re�ete &Tan�mla'
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      OnClick = RECETETANIM1Click
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
        FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC
        C8807FF7777777777FF700000000000000007777777777777777333333333333
        33333333333333333333333333333333333333333333333333330000}
      NumGlyphs = 2
    end
    object BitBtn4: TBitBtn
      Left = 418
      Top = 79
      Width = 52
      Height = 48
      Caption = '��&k��'
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 8
      Kind = bkClose
      Layout = blGlyphTop
    end
    object BitBtn5: TBitBtn
      Left = 9
      Top = 64
      Width = 127
      Height = 27
      Caption = 'Re�.yi &Yazd�r'
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = ListeiYazdr1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
        8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
        8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
        8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
    end
    object CheckBCer: TCheckBox
      Left = 308
      Top = 32
      Width = 131
      Height = 17
      Caption = '�er�eveli ��k�� &Ver'
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 7
    end
    object SpinEditUZ: TSpinEdit
      Left = 234
      Top = 31
      Width = 49
      Height = 23
      EditorEnabled = False
      Increment = 5
      MaxValue = 100
      MinValue = 10
      TabOrder = 6
      Value = 10
    end
    object RadioGrpSIRA: TRadioGroup
      Left = 280
      Top = 58
      Width = 134
      Height = 68
      Caption = 'SIRALAMA KR�TER�'
      Color = clSilver
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ItemIndex = 0
      Items.Strings = (
        'Re�.Kay�t Def.No'
        'Re�.Trh.+Sat�� No'
        'R.Aln.Trh.+Sat�� No'
        'Seri No')
      ParentColor = False
      ParentFont = False
      TabOrder = 4
    end
  end
  object QRBandUZ: TQRBand
    Left = 0
    Top = 411
    Width = 1200
    Height = 18
    Align = alTop
    BandType = rbDetail
    BeforePrint = QRBandUZBeforePrint
    Color = clWhite
    ForceNewPage = False
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    Ruler = qrrNone
  end
  object QuickReport: TQuickReport
    DataSource = DS_RECKOPYA
    ColumnMarginInches = 0
    ColumnMarginMM = 0
    Columns = 1
    DisplayPrintDialog = True
    LeftMarginInches = 0
    LeftMarginMM = 0
    Orientation = poPortrait
    PageFrame.DrawTop = False
    PageFrame.DrawBottom = False
    PageFrame.DrawLeft = False
    PageFrame.DrawRight = False
    PaperLength = 0
    PaperSize = qrpDefault
    PaperWidth = 0
    ReportTitle = 'Re�ete Arkas� D�k�m�'
    RestartData = True
    SQLCompatible = False
    TitleBeforeHeader = True
    Left = 316
    Top = 196
  end
  object T_HASTA: TTable
    DatabaseName = 'ECZ'
    IndexFieldNames = 'HASTANO'
    ReadOnly = True
    TableName = 'Hasta.DB'
    Left = 264
    Top = 173
    object T_HASTAHASTANO: TAutoIncField
      FieldName = 'HASTANO'
    end
    object T_HASTAHASTADI: TStringField
      FieldName = 'HASTADI'
      Size = 18
    end
    object T_HASTAHASTASOYAD: TStringField
      FieldName = 'HASTASOYAD'
      Size = 18
    end
  end
  object DS_HASTA: TDataSource
    DataSet = T_HASTA
    Left = 288
    Top = 173
  end
  object ECZACI: TTable
    DatabaseName = 'ECZ'
    ReadOnly = True
    TableName = 'Ekim.DB'
    Left = 400
    Top = 212
    object ECZACIEADI: TStringField
      FieldName = 'EADI'
      Size = 35
    end
    object ECZACIMESULAD: TStringField
      FieldName = 'MESULAD'
      Size = 36
    end
    object ECZACIADR1: TStringField
      FieldName = 'ADR1'
    end
    object ECZACIADR2: TStringField
      FieldName = 'ADR2'
    end
    object ECZACIADR3: TStringField
      FieldName = 'ADR3'
    end
    object ECZACITLF: TStringField
      FieldName = 'TLF'
      Size = 11
    end
  end
  object DS_ECZACI: TDataSource
    DataSet = ECZACI
    Left = 152
    Top = 132
  end
  object DS_RECKOPYA: TDataSource
    DataSet = QRecKopya
    Left = 280
    Top = 256
  end
  object DS_KRMLAR: TDataSource
    DataSet = T_KRMLAR
    Left = 288
    Top = 216
  end
  object T_KRMLAR: TTable
    DatabaseName = 'ECZ'
    IndexFieldNames = 'KOD'
    ReadOnly = True
    TableName = 'KRMLAR.DB'
    Left = 248
    Top = 216
    object T_KRMLARKOD: TStringField
      FieldName = 'KOD'
      Size = 11
    end
    object T_KRMLARILACLARDAKURUM: TFloatField
      FieldName = 'ILACLARDAKURUM'
      DisplayFormat = '%#.#'
    end
    object T_KRMLAROZELKATILIMKURUM: TFloatField
      FieldName = 'OZELKATILIMKURUM'
      DisplayFormat = '%#.#'
    end
    object T_KRMLARILACBERABERKURUM: TFloatField
      FieldName = 'ILACBERABERKURUM'
      DisplayFormat = '%#.#'
    end
    object T_KRMLARILACLARDACALISAN: TFloatField
      FieldName = 'ILACLARDACALISAN'
    end
    object T_KRMLAROZELKATILIMCALISAN: TFloatField
      FieldName = 'OZELKATILIMCALISAN'
    end
    object T_KRMLARILACBERABERCALISAN: TFloatField
      FieldName = 'ILACBERABERCALISAN'
    end
    object T_KRMLARILACLARDARAPYAT: TFloatField
      FieldName = 'ILACLARDARAPYAT'
    end
    object T_KRMLAROZELKATILIMRAPYAT: TFloatField
      FieldName = 'OZELKATILIMRAPYAT'
    end
    object T_KRMLARILACBERABERRAPYAT: TFloatField
      FieldName = 'ILACBERABERRAPYAT'
    end
    object T_KRMLARILACLARDAEMEKLI: TFloatField
      FieldName = 'ILACLARDAEMEKLI'
    end
    object T_KRMLAROZELKATILIMEMEKLI: TFloatField
      FieldName = 'OZELKATILIMEMEKLI'
    end
    object T_KRMLARILACBERABEREMEKLI: TFloatField
      FieldName = 'ILACBERABEREMEKLI'
    end
    object T_KRMLARHSP_ISKON: TStringField
      FieldName = 'HSP_ISKON'
      Size = 1
    end
    object T_KRMLARETIKET1: TStringField
      FieldName = 'ETIKET1'
      Size = 17
    end
    object T_KRMLARETIKET2: TStringField
      FieldName = 'ETIKET2'
      Size = 17
    end
    object T_KRMLARETIKET3: TStringField
      FieldName = 'ETIKET3'
      Size = 17
    end
    object T_KRMLARILACLARDADIGER: TFloatField
      FieldName = 'ILACLARDADIGER'
    end
    object T_KRMLAROZELKATILIMDIGER: TFloatField
      FieldName = 'OZELKATILIMDIGER'
    end
    object T_KRMLARILACBERABERDIGER: TFloatField
      FieldName = 'ILACBERABERDIGER'
    end
    object T_KRMLARAD: TStringField
      FieldName = 'AD'
      Size = 36
    end
    object T_KRMLARITHALKURUM: TFloatField
      FieldName = 'ITHALKURUM'
      DisplayFormat = '%#.#'
    end
    object T_KRMLARITHALCALISAN: TFloatField
      FieldName = 'ITHALCALISAN'
    end
    object T_KRMLARITHALRAPYAT: TFloatField
      FieldName = 'ITHALRAPYAT'
    end
    object T_KRMLARITHALEMEKLI: TFloatField
      FieldName = 'ITHALEMEKLI'
    end
    object T_KRMLARITHALDIGER: TFloatField
      FieldName = 'ITHALDIGER'
    end
    object T_KRMLARIHLRAPKURUM: TFloatField
      FieldName = 'IHLRAPKURUM'
    end
    object T_KRMLARIHLRAPCALISAN: TFloatField
      FieldName = 'IHLRAPCALISAN'
    end
    object T_KRMLARIHLRAPEMEKLI: TFloatField
      FieldName = 'IHLRAPEMEKLI'
    end
    object T_KRMLARIHLRAPRAPYAT: TFloatField
      FieldName = 'IHLRAPRAPYAT'
    end
    object T_KRMLARIHLRAPDIGER: TFloatField
      FieldName = 'IHLRAPDIGER'
    end
  end
  object QRecKopya: TQuery
    BeforeOpen = QRecKopyaBeforeOpen
    AfterOpen = QRecKopyaAfterOpen
    BeforeClose = QRecKopyaBeforeClose
    OnCalcFields = QRecKopyaCalcFields
    DatabaseName = 'ECZ'
    Params.Data = {01000100044854697000010200C7000001}
    SQL.Strings = (
      'SELECT * FROM RECTEMP'
      'WHERE HASTATIP=:HTip'
      'ORDER BY RKDEFTERNO')
    Left = 248
    Top = 253
    object QRecKopyaKURUMKOD: TStringField
      FieldName = 'KURUMKOD'
      Size = 11
    end
    object QRecKopyaALTARIH: TDateField
      DisplayWidth = 8
      FieldName = 'ALTARIH'
      DisplayFormat = 'dd/mm/yy'
    end
    object QRecKopyaHASTANO: TIntegerField
      FieldName = 'HASTANO'
      OnGetText = QRecKopyaHASTANOGetText
    end
    object QRecKopyaHASTATIP: TStringField
      FieldName = 'HASTATIP'
      Size = 1
    end
    object QRecKopyaBAS1: TStringField
      FieldName = 'BAS1'
      Size = 17
    end
    object QRecKopyaBAS2: TStringField
      FieldName = 'BAS2'
      Size = 17
    end
    object QRecKopyaBAS3: TStringField
      FieldName = 'BAS3'
      Size = 17
    end
    object QRecKopyaBRUTN: TCurrencyField
      FieldName = 'BRUTN'
      DisplayFormat = '#,#'
    end
    object QRecKopyaBRUTO: TCurrencyField
      FieldName = 'BRUTO'
      DisplayFormat = '#,#'
    end
    object QRecKopyaBRUTI: TCurrencyField
      FieldName = 'BRUTI'
      DisplayFormat = '#,#'
    end
    object QRecKopyaHASTAKATPAY: TCurrencyField
      FieldName = 'HASTAKATPAY'
      DisplayFormat = '#,#'
    end
    object QRecKopyaNET: TCurrencyField
      FieldName = 'NET'
      DisplayFormat = '#,#'
    end
    object QRecKopyayuzdeN: TFloatField
      Calculated = True
      FieldName = 'yuzdeN'
      DisplayFormat = '%#.#'
    end
    object QRecKopyayuzdeI: TFloatField
      Calculated = True
      FieldName = 'yuzdeI'
      DisplayFormat = '%#.#'
    end
    object QRecKopyayuzdeO: TFloatField
      Calculated = True
      FieldName = 'yuzdeO'
      DisplayFormat = '%#.#'
    end
    object QRecKopyaPROTOKOLNO: TStringField
      FieldName = 'PROTOKOLNO'
      Size = 10
    end
    object QRecKopyaSATISNO: TFloatField
      FieldName = 'SATISNO'
    end
    object QRecKopyaBRUT: TCurrencyField
      Calculated = True
      FieldName = 'BRUT'
      DisplayFormat = '#,#'
    end
    object QRecKopyaINDIRIM: TCurrencyField
      Calculated = True
      FieldName = 'INDIRIM'
      DisplayFormat = '#,#'
    end
    object QRecKopyaRECTARIH: TDateField
      FieldName = 'RECTARIH'
    end
    object QRecKopyaFATARIH: TDateField
      FieldName = 'FATARIH'
    end
    object QRecKopyaBAS4: TStringField
      FieldName = 'BAS4'
      Size = 17
    end
    object QRecKopyaBAS5: TStringField
      FieldName = 'BAS5'
      Size = 17
    end
    object QRecKopyaBAS6: TStringField
      FieldName = 'BAS6'
      Size = 17
    end
    object QRecKopyaRKDEFTERNO: TStringField
      FieldName = 'RKDEFTERNO'
      Size = 9
    end
    object QRecKopyaVIZETRH: TDateField
      FieldName = 'VIZETRH'
      OnGetText = QRecKopyaVIZETRHGetText
    end
    object QRecKopyaDRKOD: TIntegerField
      FieldName = 'DRKOD'
    end
    object QRecKopyaSERINO: TStringField
      FieldName = 'SERINO'
      Size = 10
    end
    object QRecKopyaFATNO: TFloatField
      FieldName = 'FATNO'
    end
    object QRecKopyaFATURANO: TStringField
      FieldName = 'FATURANO'
      Size = 11
    end
    object QRecKopyaYER: TStringField
      FieldName = 'YER'
      Size = 1
    end
    object QRecKopyaKDVA: TCurrencyField
      FieldName = 'KDVA'
    end
    object QRecKopyaKDVB: TCurrencyField
      FieldName = 'KDVB'
    end
    object QRecKopyaKDVC: TCurrencyField
      FieldName = 'KDVC'
    end
    object QRecKopyaDZADR1: TStringField
      FieldName = 'DZADR1'
      Size = 30
    end
    object QRecKopyaDZADR2: TStringField
      FieldName = 'DZADR2'
      Size = 30
    end
    object QRecKopyaHKPson: TCurrencyField
      Calculated = True
      FieldName = 'HKPson'
      DisplayFormat = '#,#'
    end
    object QRecKopyaIndirN: TCurrencyField
      Calculated = True
      FieldName = 'IndirN'
      DisplayFormat = '#,#'
    end
    object QRecKopyaIndirI: TCurrencyField
      Calculated = True
      FieldName = 'IndirI'
      DisplayFormat = '#,#'
    end
    object QRecKopyaIndirO: TCurrencyField
      Calculated = True
      FieldName = 'IndirO'
      DisplayFormat = '#,#'
    end
    object QRecKopyaBakiN: TCurrencyField
      Calculated = True
      FieldName = 'BakiN'
      DisplayFormat = '#,#'
    end
    object QRecKopyaBakiI: TCurrencyField
      Calculated = True
      FieldName = 'BakiI'
      DisplayFormat = '#,#'
    end
    object QRecKopyaBakiO: TCurrencyField
      Calculated = True
      FieldName = 'BakiO'
      DisplayFormat = '#,#'
    end
    object QRecKopyaHKPn: TCurrencyField
      Calculated = True
      FieldName = 'HKPn'
      DisplayFormat = '#,#'
    end
    object QRecKopyaHKPi: TCurrencyField
      Calculated = True
      FieldName = 'HKPi'
      DisplayFormat = '#,#'
    end
    object QRecKopyaHKPo: TCurrencyField
      Calculated = True
      FieldName = 'HKPo'
      DisplayFormat = '#,#'
    end
    object QRecKopyaNetN: TCurrencyField
      Calculated = True
      FieldName = 'NetN'
      DisplayFormat = '#,#'
    end
    object QRecKopyaNetI: TCurrencyField
      Calculated = True
      FieldName = 'NetI'
      DisplayFormat = '#,#'
    end
    object QRecKopyaNetO: TCurrencyField
      Calculated = True
      FieldName = 'NetO'
      DisplayFormat = '#,#'
    end
    object QRecKopyaNETSON: TCurrencyField
      Calculated = True
      FieldName = 'NETSON'
      DisplayFormat = '#,#'
    end
    object QRecKopyaBRUTH: TCurrencyField
      FieldName = 'BRUTH'
      DisplayFormat = '#,#'
    end
    object QRecKopyaNetH: TCurrencyField
      Calculated = True
      FieldName = 'NetH'
      DisplayFormat = '#,#'
    end
    object QRecKopyaBakiH: TCurrencyField
      Calculated = True
      FieldName = 'BakiH'
      DisplayFormat = '#,#'
    end
    object QRecKopyaHKPh: TCurrencyField
      Calculated = True
      FieldName = 'HKPh'
      DisplayFormat = '#,#'
    end
    object QRecKopyaIndirH: TCurrencyField
      Calculated = True
      FieldName = 'IndirH'
      DisplayFormat = '#,#'
    end
    object QRecKopyayuzdeH: TFloatField
      Calculated = True
      FieldName = 'yuzdeH'
      DisplayFormat = '%#.#'
    end
    object QRecKopyaINDIRSon: TCurrencyField
      Calculated = True
      FieldName = 'INDIRSon'
      DisplayFormat = '#,#'
    end
    object QRecKopyaBRUTMR: TCurrencyField
      FieldName = 'BRUTMR'
    end
    object QRecKopyaNetMR: TCurrencyField
      Calculated = True
      FieldName = 'NetMR'
    end
    object QRecKopyaBakiMR: TCurrencyField
      Calculated = True
      FieldName = 'BakiMR'
    end
    object QRecKopyaHKPmr: TCurrencyField
      Calculated = True
      FieldName = 'HKPmr'
    end
    object QRecKopyaIndirMR: TCurrencyField
      Calculated = True
      FieldName = 'IndirMR'
    end
    object QRecKopyayuzdeMR: TFloatField
      Calculated = True
      FieldName = 'yuzdeMR'
    end
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Device = fdBoth
    MinFontSize = 0
    MaxFontSize = 0
    Left = 348
    Top = 193
  end
  object MainMenu1: TMainMenu
    Left = 144
    Top = 49
    object FontAyar1: TMenuItem
      Caption = 'YAZIM T�P� AYARI'
      ShortCut = 0
      object EnineYazdr1: TMenuItem
        Caption = 'Enine Yazd�r'
        ShortCut = 0
        OnClick = EnineYazdr1Click
      end
      object BoyunaYazdr1: TMenuItem
        Caption = 'Boyuna Yazd�r'
        ShortCut = 0
        OnClick = BoyunaYazdr1Click
      end
    end
    object RECETETANIM1: TMenuItem
      Caption = 'RECETE TANIMLA'
      ShortCut = 0
      OnClick = RECETETANIM1Click
    end
    object ListeEkranGrnts1: TMenuItem
      Caption = 'RE�.�NG�R�N�M    '
      ShortCut = 0
      OnClick = ListeEkranGrnts1Click
    end
    object ListeiYazdr1: TMenuItem
      Caption = 'RE�.YAZDIR    '
      ShortCut = 0
      OnClick = ListeiYazdr1Click
    end
  end
  object SATIS: TTable
    OnCalcFields = SATISCalcFields
    DatabaseName = 'ECZ'
    IndexFieldNames = 'SATISNO'
    MasterFields = 'SATISNO'
    MasterSource = DS_RECKOPYA
    ReadOnly = True
    TableName = 'SATIS.DB'
    Left = 208
    Top = 132
    object SATISSATISNO: TFloatField
      FieldName = 'SATISNO'
    end
    object SATISILACNO: TIntegerField
      FieldName = 'ILACNO'
    end
    object SATISFIYAT: TCurrencyField
      FieldName = 'FIYAT'
      DisplayFormat = '#,#'
    end
    object SATISMIKTAR: TIntegerField
      FieldName = 'MIKTAR'
    end
    object SATISRECETETIP: TStringField
      FieldName = 'RECETETIP'
      Size = 1
    end
    object SATISbN: TCurrencyField
      Calculated = True
      FieldName = 'bN'
      DisplayFormat = '#,#'
    end
    object SATISbI: TCurrencyField
      Calculated = True
      FieldName = 'bI'
      DisplayFormat = '#,#'
    end
    object SATISbO: TCurrencyField
      Calculated = True
      FieldName = 'bO'
      DisplayFormat = '#,#'
    end
    object SATISILAD: TStringField
      FieldName = 'ILAD'
      Lookup = True
      LookupDataSet = T_URUN
      LookupKeyFields = 'ILACNO'
      LookupResultField = 'ILACAD'
      KeyFields = 'ILACNO'
      Size = 36
    end
    object SATISBARKOD: TStringField
      FieldName = 'BARKOD'
      Lookup = True
      LookupDataSet = T_URUN
      LookupKeyFields = 'ILACNO'
      LookupResultField = 'ILACKOD'
      KeyFields = 'ILACNO'
      Size = 13
    end
    object SATISBRUTUTAR: TCurrencyField
      Calculated = True
      FieldName = 'BRUTUTAR'
      DisplayFormat = '#,#'
    end
    object SATISbNTUT: TCurrencyField
      Calculated = True
      FieldName = 'bNTUT'
      DisplayFormat = '#,#'
    end
    object SATISbITUT: TCurrencyField
      Calculated = True
      FieldName = 'bITUT'
      DisplayFormat = '#,#'
    end
    object SATISbOTUT: TCurrencyField
      Calculated = True
      FieldName = 'bOTUT'
      DisplayFormat = '#,#'
    end
    object SATISSIRANOURUN: TIntegerField
      FieldName = 'SIRANOURUN'
    end
    object SATISbH: TCurrencyField
      Calculated = True
      FieldName = 'bH'
      DisplayFormat = '#,#'
    end
    object SATISbHTUT: TCurrencyField
      Calculated = True
      FieldName = 'bHTUT'
      DisplayFormat = '#,#'
    end
    object SATISbMR: TCurrencyField
      Calculated = True
      FieldName = 'bMR'
    end
    object SATISbMRTUT: TCurrencyField
      Calculated = True
      FieldName = 'bMRTUT'
    end
  end
  object DS_SATIS: TDataSource
    DataSet = SATIS
    Left = 400
    Top = 148
  end
  object T_URUN: TTable
    DatabaseName = 'ECZ'
    ReadOnly = True
    TableName = 'URUN.DB'
    Left = 360
    Top = 148
    object T_URUNILACNO: TAutoIncField
      FieldName = 'ILACNO'
    end
    object T_URUNILACAD: TStringField
      FieldName = 'ILACAD'
      Size = 36
    end
    object T_URUNILACKOD: TStringField
      FieldName = 'ILACKOD'
      Size = 13
    end
  end
  object DetailLink: TQRDetailLink
    DataSource = DS_SATIS
    DetailBand = Detail
    HeaderBand = PageHeader
    Master = QuickReport
    PrintBefore = True
    Left = 324
    Top = 148
  end
  object RecKolon: TTable
    DatabaseName = 'ECZ'
    ReadOnly = True
    TableName = 'recarka.db'
    Left = 248
    Top = 288
    object RecKolonKURUMKOD: TStringField
      FieldName = 'KURUMKOD'
      Size = 11
    end
    object RecKolonHASTATIP: TStringField
      FieldName = 'HASTATIP'
      Size = 1
    end
    object RecKolonFONTADI: TStringField
      FieldName = 'FONTADI'
      Size = 35
    end
    object RecKolonSIZE: TSmallintField
      FieldName = 'SIZE'
    end
    object RecKolonSTYLE: TStringField
      FieldName = 'STYLE'
      Size = 1
    end
    object RecKolonCOLOR: TIntegerField
      FieldName = 'COLOR'
    end
    object RecKolonMARJIN: TSmallintField
      FieldName = 'MARJIN'
    end
    object RecKolonALAN1: TStringField
      FieldName = 'ALAN1'
      Size = 25
    end
    object RecKolonCAPTION1: TStringField
      FieldName = 'CAPTION1'
      Size = 35
    end
    object RecKolonDATA1: TStringField
      FieldName = 'DATA1'
      Size = 21
    end
    object RecKolonGENIS1: TSmallintField
      FieldName = 'GENIS1'
    end
    object RecKolonALAN2: TStringField
      FieldName = 'ALAN2'
      Size = 25
    end
    object RecKolonCAPTION2: TStringField
      FieldName = 'CAPTION2'
      Size = 35
    end
    object RecKolonDATA2: TStringField
      FieldName = 'DATA2'
      Size = 21
    end
    object RecKolonGENIS2: TSmallintField
      FieldName = 'GENIS2'
    end
    object RecKolonALAN3: TStringField
      FieldName = 'ALAN3'
      Size = 25
    end
    object RecKolonCAPTION3: TStringField
      FieldName = 'CAPTION3'
      Size = 35
    end
    object RecKolonDATA3: TStringField
      FieldName = 'DATA3'
      Size = 21
    end
    object RecKolonGENIS3: TSmallintField
      FieldName = 'GENIS3'
    end
    object RecKolonALAN4: TStringField
      FieldName = 'ALAN4'
      Size = 25
    end
    object RecKolonCAPTION4: TStringField
      FieldName = 'CAPTION4'
      Size = 35
    end
    object RecKolonDATA4: TStringField
      FieldName = 'DATA4'
      Size = 21
    end
    object RecKolonGENIS4: TSmallintField
      FieldName = 'GENIS4'
    end
    object RecKolonALAN5: TStringField
      FieldName = 'ALAN5'
      Size = 25
    end
    object RecKolonCAPTION5: TStringField
      FieldName = 'CAPTION5'
      Size = 35
    end
    object RecKolonDATA5: TStringField
      FieldName = 'DATA5'
      Size = 21
    end
    object RecKolonGENIS5: TSmallintField
      FieldName = 'GENIS5'
    end
    object RecKolonALAN6: TStringField
      FieldName = 'ALAN6'
      Size = 25
    end
    object RecKolonCAPTION6: TStringField
      FieldName = 'CAPTION6'
      Size = 35
    end
    object RecKolonDATA6: TStringField
      FieldName = 'DATA6'
      Size = 21
    end
    object RecKolonGENIS6: TSmallintField
      FieldName = 'GENIS6'
    end
    object RecKolonALAN7: TStringField
      FieldName = 'ALAN7'
      Size = 25
    end
    object RecKolonCAPTION7: TStringField
      FieldName = 'CAPTION7'
      Size = 35
    end
    object RecKolonDATA7: TStringField
      FieldName = 'DATA7'
      Size = 21
    end
    object RecKolonGENIS7: TSmallintField
      FieldName = 'GENIS7'
    end
    object RecKolonALAN8: TStringField
      FieldName = 'ALAN8'
      Size = 25
    end
    object RecKolonCAPTION8: TStringField
      FieldName = 'CAPTION8'
      Size = 35
    end
    object RecKolonDATA8: TStringField
      FieldName = 'DATA8'
      Size = 21
    end
    object RecKolonGENIS8: TSmallintField
      FieldName = 'GENIS8'
    end
    object RecKolonALAN9: TStringField
      FieldName = 'ALAN9'
      Size = 25
    end
    object RecKolonCAPTION9: TStringField
      FieldName = 'CAPTION9'
      Size = 35
    end
    object RecKolonDATA9: TStringField
      FieldName = 'DATA9'
      Size = 21
    end
    object RecKolonGENIS9: TSmallintField
      FieldName = 'GENIS9'
    end
    object RecKolonB_ALAN1: TStringField
      FieldName = 'B_ALAN1'
      Size = 25
    end
    object RecKolonB_CAPTION1: TStringField
      FieldName = 'B_CAPTION1'
      Size = 35
    end
    object RecKolonB_DATA1: TStringField
      FieldName = 'B_DATA1'
      Size = 21
    end
    object RecKolonB_GENIS1: TSmallintField
      FieldName = 'B_GENIS1'
    end
    object RecKolonB_ALAN2: TStringField
      FieldName = 'B_ALAN2'
      Size = 25
    end
    object RecKolonB_CAPTION2: TStringField
      FieldName = 'B_CAPTION2'
      Size = 35
    end
    object RecKolonB_DATA2: TStringField
      FieldName = 'B_DATA2'
      Size = 21
    end
    object RecKolonB_GENIS2: TSmallintField
      FieldName = 'B_GENIS2'
    end
    object RecKolonB_ALAN3: TStringField
      FieldName = 'B_ALAN3'
      Size = 25
    end
    object RecKolonB_CAPTION3: TStringField
      FieldName = 'B_CAPTION3'
      Size = 35
    end
    object RecKolonB_DATA3: TStringField
      FieldName = 'B_DATA3'
      Size = 21
    end
    object RecKolonB_GENIS3: TSmallintField
      FieldName = 'B_GENIS3'
    end
    object RecKolonB_ALAN4: TStringField
      FieldName = 'B_ALAN4'
      Size = 25
    end
    object RecKolonB_CAPTION4: TStringField
      FieldName = 'B_CAPTION4'
      Size = 35
    end
    object RecKolonB_DATA4: TStringField
      FieldName = 'B_DATA4'
      Size = 21
    end
    object RecKolonB_GENIS4: TSmallintField
      FieldName = 'B_GENIS4'
    end
    object RecKolonB_ALAN5: TStringField
      FieldName = 'B_ALAN5'
      Size = 25
    end
    object RecKolonB_CAPTION5: TStringField
      FieldName = 'B_CAPTION5'
      Size = 35
    end
    object RecKolonB_DATA5: TStringField
      FieldName = 'B_DATA5'
      Size = 21
    end
    object RecKolonB_GENIS5: TSmallintField
      FieldName = 'B_GENIS5'
    end
    object RecKolonB_ALAN6: TStringField
      FieldName = 'B_ALAN6'
      Size = 25
    end
    object RecKolonB_CAPTION6: TStringField
      FieldName = 'B_CAPTION6'
      Size = 35
    end
    object RecKolonB_DATA6: TStringField
      FieldName = 'B_DATA6'
      Size = 21
    end
    object RecKolonB_GENIS6: TSmallintField
      FieldName = 'B_GENIS6'
    end
    object RecKolonB_ALAN7: TStringField
      FieldName = 'B_ALAN7'
      Size = 25
    end
    object RecKolonB_CAPTION7: TStringField
      FieldName = 'B_CAPTION7'
      Size = 35
    end
    object RecKolonB_DATA7: TStringField
      FieldName = 'B_DATA7'
      Size = 21
    end
    object RecKolonB_GENIS7: TSmallintField
      FieldName = 'B_GENIS7'
    end
    object RecKolonTOPVERNE: TStringField
      FieldName = 'TOPVERNE'
      Size = 1
    end
    object RecKolonILACVARMI: TStringField
      FieldName = 'ILACVARMI'
      Size = 1
    end
    object RecKolonB_ALAN8: TStringField
      FieldName = 'B_ALAN8'
      Size = 25
    end
    object RecKolonB_CAPTION8: TStringField
      FieldName = 'B_CAPTION8'
      Size = 35
    end
    object RecKolonB_DATA8: TStringField
      FieldName = 'B_DATA8'
      Size = 21
    end
    object RecKolonB_GENIS8: TSmallintField
      FieldName = 'B_GENIS8'
    end
  end
  object DS_RecKolon: TDataSource
    DataSet = RecKolon
    Left = 280
    Top = 304
  end
  object BatchMove1: TBatchMove
    Destination = RecKopya
    Mode = batCopy
    Source = Query1
    Left = 27
    Top = 364
  end
  object RecKopya: TTable
    DatabaseName = 'ECZ'
    TableName = 'RECTEMP.DB'
    Left = 78
    Top = 372
    object RecKopyaHASTANO: TIntegerField
      Alignment = taLeftJustify
      DisplayLabel = 'Hasta Ad�'
      DisplayWidth = 27
      FieldName = 'HASTANO'
    end
    object RecKopyaHASTATIP: TStringField
      DisplayLabel = 'Hst.Tip'
      FieldName = 'HASTATIP'
      Size = 1
    end
    object RecKopyaALTARIH: TDateField
      DisplayLabel = 'Aln.Tarih'
      DisplayWidth = 8
      FieldName = 'ALTARIH'
      DisplayFormat = 'dd.mm.yy'
    end
    object RecKopyaRECTARIH: TDateField
      DisplayLabel = 'Re�.Trh.'
      DisplayWidth = 8
      FieldName = 'RECTARIH'
      DisplayFormat = 'dd.mm.yy'
    end
    object RecKopyaBRUTO: TCurrencyField
      FieldName = 'BRUTO'
      Visible = False
    end
    object RecKopyaBRUTN: TCurrencyField
      FieldName = 'BRUTN'
      Visible = False
    end
    object RecKopyaBRUTI: TCurrencyField
      FieldName = 'BRUTI'
      Visible = False
    end
    object RecKopyaKURUMKOD: TStringField
      FieldName = 'KURUMKOD'
      Visible = False
      Size = 11
    end
    object RecKopyaRKDEFTERNO: TStringField
      FieldName = 'RKDEFTERNO'
      Visible = False
      Size = 9
    end
    object RecKopyaFATURANO: TStringField
      FieldName = 'FATURANO'
      Visible = False
      Size = 11
    end
    object RecKopyaFATARIH: TDateField
      FieldName = 'FATARIH'
      Visible = False
    end
    object RecKopyaHASTAKATPAY: TCurrencyField
      Calculated = True
      DisplayLabel = 'Hst. Kat.Pay.'
      DisplayWidth = 12
      FieldName = 'HASTAKATPAY'
    end
    object RecKopyaNET: TCurrencyField
      Calculated = True
      DisplayLabel = 'NET TUTAR'
      DisplayWidth = 16
      FieldName = 'NET'
    end
    object RecKopyaBAS1: TStringField
      DisplayLabel = '1.Ba�l�k'
      FieldName = 'BAS1'
      Size = 17
    end
    object RecKopyaBAS2: TStringField
      DisplayLabel = '2.Ba�l�k'
      FieldName = 'BAS2'
      Size = 17
    end
    object RecKopyaBAS3: TStringField
      DisplayLabel = '3.Ba�l�k'
      FieldName = 'BAS3'
      Size = 17
    end
    object RecKopyaSATISNO: TFloatField
      DisplayLabel = 'Sat�� No'
      DisplayWidth = 8
      FieldName = 'SATISNO'
    end
    object RecKopyaKDVC: TCurrencyField
      DisplayLabel = '3. T�P KDV'
      FieldName = 'KDVC'
      Visible = False
    end
    object RecKopyaKDVB: TCurrencyField
      DisplayLabel = '2. T�P KDV'
      FieldName = 'KDVB'
      Visible = False
    end
    object RecKopyaKDVA: TCurrencyField
      DisplayLabel = '1. T�P KDV'
      DisplayWidth = 10
      FieldName = 'KDVA'
      Visible = False
    end
  end
  object Query1: TQuery
    DatabaseName = 'ECZ'
    Params.Data = {01000100045361744E00030400010000000001}
    SQL.Strings = (
      'SELECT * FROM RECETE'
      'WHERE RECETE.SATISNO=:SatN ')
    Left = 200
    Top = 104
    object Query1RKDEFTERNO: TStringField
      FieldName = 'RKDEFTERNO'
      Size = 9
    end
    object Query1KURUMKOD: TStringField
      FieldName = 'KURUMKOD'
      Size = 11
    end
    object Query1SATISNO: TFloatField
      FieldName = 'SATISNO'
    end
    object Query1DRKOD: TIntegerField
      FieldName = 'DRKOD'
    end
    object Query1SERINO: TStringField
      FieldName = 'SERINO'
      Size = 10
    end
    object Query1PROTOKOLNO: TStringField
      FieldName = 'PROTOKOLNO'
      Size = 10
    end
    object Query1RECTARIH: TDateField
      FieldName = 'RECTARIH'
    end
    object Query1ALTARIH: TDateField
      FieldName = 'ALTARIH'
    end
    object Query1FATARIH: TDateField
      FieldName = 'FATARIH'
    end
    object Query1FATNO: TFloatField
      FieldName = 'FATNO'
    end
    object Query1FATURANO: TStringField
      FieldName = 'FATURANO'
      Size = 11
    end
    object Query1HASTANO: TIntegerField
      FieldName = 'HASTANO'
    end
    object Query1HASTATIP: TStringField
      FieldName = 'HASTATIP'
      Size = 1
    end
    object Query1YER: TStringField
      FieldName = 'YER'
      Size = 1
    end
    object Query1BAS1: TStringField
      FieldName = 'BAS1'
      Size = 17
    end
    object Query1BAS2: TStringField
      FieldName = 'BAS2'
      Size = 17
    end
    object Query1BAS3: TStringField
      FieldName = 'BAS3'
      Size = 17
    end
    object Query1BRUTN: TCurrencyField
      FieldName = 'BRUTN'
    end
    object Query1BRUTO: TCurrencyField
      FieldName = 'BRUTO'
    end
    object Query1BRUTI: TCurrencyField
      FieldName = 'BRUTI'
    end
    object Query1HASTAKATPAY: TCurrencyField
      FieldName = 'HASTAKATPAY'
    end
    object Query1NET: TCurrencyField
      FieldName = 'NET'
    end
    object Query1KDVA: TCurrencyField
      FieldName = 'KDVA'
    end
    object Query1KDVB: TCurrencyField
      FieldName = 'KDVB'
    end
    object Query1KDVC: TCurrencyField
      FieldName = 'KDVC'
    end
    object Query1DZADR1: TStringField
      FieldName = 'DZADR1'
      Size = 30
    end
    object Query1DZADR2: TStringField
      FieldName = 'DZADR2'
      Size = 30
    end
    object Query1BAS4: TStringField
      FieldName = 'BAS4'
      Size = 17
    end
    object Query1BAS5: TStringField
      FieldName = 'BAS5'
      Size = 17
    end
    object Query1BAS6: TStringField
      FieldName = 'BAS6'
      Size = 17
    end
    object Query1VIZETRH: TDateField
      FieldName = 'VIZETRH'
    end
  end
end